home *** CD-ROM | disk | FTP | other *** search
- object FrmEvents: TFrmEvents
- Left = 386
- Top = 149
- Width = 513
- Height = 431
- Caption = 'Events'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Tahoma'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 120
- TextHeight = 16
- object PnlMain: TElPanel
- Left = 77
- Top = 0
- Width = 428
- Height = 340
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- DockOrientation = doNoOrient
- object EventTree: TElTree
- Left = 10
- Top = 65
- Width = 282
- Height = 275
- Align = alClient
- HeaderHeight = 19
- HeaderSections.Data = {F4FFFFFF00000000}
- HorizontalLines = True
- HorzScrollBarStyles.ShowTrackHint = False
- HorzScrollBarStyles.Width = 17
- HorzScrollBarStyles.ButtonSize = 21
- LineHeight = 18
- ShowCheckboxes = True
- ShowLeafButton = False
- StoragePath = '\Tree'
- TabOrder = 1
- TabStop = True
- UseCustomScrollBars = False
- VertScrollBarStyles.ShowTrackHint = True
- VertScrollBarStyles.Width = 17
- VertScrollBarStyles.ButtonSize = 21
- OnItemChecked = EventTreeItemChecked
- OnItemSelectedChange = EventTreeItemSelectedChange
- OnDblClick = EventTreeDblClick
- end
- object PnlToolbar: TElPanel
- Left = 292
- Top = 65
- Width = 136
- Height = 275
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 2
- DockOrientation = doNoOrient
- object BtnEdit: TButton
- Left = 10
- Top = 102
- Width = 115
- Height = 42
- Caption = '&Edit...'
- Enabled = False
- TabOrder = 0
- OnClick = BtnEditClick
- end
- object BtnDelete: TButton
- Left = 10
- Top = 44
- Width = 115
- Height = 29
- Caption = '&Delete Event'
- Enabled = False
- TabOrder = 1
- OnClick = BtnDeleteClick
- end
- object BtnNew: TButton
- Left = 10
- Top = 10
- Width = 115
- Height = 29
- Caption = '&New Event'
- TabOrder = 2
- OnClick = BtnNewClick
- end
- end
- object PnlLeft: TElPanel
- Left = 0
- Top = 65
- Width = 10
- Height = 275
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 3
- DockOrientation = doNoOrient
- end
- object PnlTop: TElPanel
- Left = 0
- Top = 0
- Width = 428
- Height = 65
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- DockOrientation = doNoOrient
- DesignSize = (
- 428
- 65)
- object LblEvents: TLabel
- Left = 12
- Top = 10
- Width = 155
- Height = 16
- Caption = 'Show the following events:'
- end
- object cbEventKind: TElAdvancedComboBox
- Left = 10
- Top = 32
- Width = 408
- Height = 24
- Anchors = [akLeft, akTop, akRight]
- AutoCompletion = False
- Flat = False
- HandleDialogKeys = False
- HorizontalScroll = False
- ItemIndex = -1
- ItemHeight = 16
- Sorted = True
- Style = csDropDownList
- TabOrder = 0
- OnChange = cbEventKindChange
- end
- end
- end
- object PnlBottom: TElPanel
- Left = 0
- Top = 340
- Width = 505
- Height = 51
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- DockOrientation = doNoOrient
- DesignSize = (
- 505
- 51)
- object BtnOK: TButton
- Left = 284
- Top = 9
- Width = 100
- Height = 30
- Anchors = [akTop, akRight]
- Caption = '&OK'
- Default = True
- TabOrder = 0
- OnClick = BtnOKClick
- end
- object BtnCancel: TButton
- Left = 393
- Top = 9
- Width = 100
- Height = 30
- Anchors = [akTop, akRight]
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- OnClick = BtnCancelClick
- end
- end
- object ElPanel1: TElPanel
- Left = 0
- Top = 0
- Width = 77
- Height = 340
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 2
- DockOrientation = doNoOrient
- object SideBar: TElSideBar
- Left = 0
- Top = 0
- Width = 77
- Height = 340
- Sections = <
- item
- Index = 0
- Caption = 'Shortcuts'
- Items = <
- item
- Index = 0
- Hint = 'OnTime'
- ImageIndex = 0
- Caption = 'Time'
- end
- item
- Index = 1
- Tag = 1
- Hint = 'OnStart'
- ImageIndex = 1
- Caption = 'Startup'
- end
- item
- Index = 2
- Tag = 3
- Hint = 'OnAdd'
- ImageIndex = 2
- Caption = 'Add'
- end
- item
- Index = 3
- Tag = 4
- Hint = 'OnDisplay'
- ImageIndex = 3
- Caption = 'Display'
- end
- item
- Index = 4
- Tag = 2
- Hint = 'OnQuit'
- ImageIndex = 4
- Caption = 'Quit'
- end>
- end>
- SectionIndex = 0
- ItemIndex = 0
- Spacing = 3
- ItemTracking = False
- ItemImages = Images
- FlatActiveItem = True
- ItemSize = 38
- ActiveBorderType = fbtFlat
- InactiveBorderType = fbtFlat
- Flat = True
- ItemsFont.Charset = DEFAULT_CHARSET
- ItemsFont.Color = clBlack
- ItemsFont.Height = -13
- ItemsFont.Name = 'Tahoma'
- ItemsFont.Style = []
- SectionsFont.Charset = DEFAULT_CHARSET
- SectionsFont.Color = clWindowText
- SectionsFont.Height = -13
- SectionsFont.Name = 'Tahoma'
- SectionsFont.Style = []
- BorderSides = [ebsRight, ebsBottom]
- OnItemChange = SideBarItemChange
- Align = alClient
- BorderStyle = bsSingle
- Color = clWhite
- TabOrder = 0
- object TElSideBarContainerPanel
- UseXPThemes = False
- TabOrder = 0
- end
- end
- end
- object Images: TImageList
- Height = 32
- Width = 32
- Left = 242
- Top = 202
- end
- end
-